home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 7 / PC World Interactive 7.iso / share / hobi / solarsys / Solar.exe / 0 / RCDATA / TFRMMONITOR / TFRMMONITOR.txt
Text File  |  1997-11-30  |  6KB  |  225 lines

  1. object frmMonitor: TfrmMonitor
  2.   Left = 379
  3.   Top = 197
  4.   Width = 370
  5.   Height = 330
  6.   BorderIcons = [biSystemMenu]
  7.   Caption = 'Solar System Monitor'
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   FormStyle = fsStayOnTop
  13.   Position = poDefault
  14.   OnCreate = FormCreate
  15.   OnDestroy = FormDestroy
  16.   OnResize = FormResize
  17.   OnShow = FormShow
  18.   PixelsPerInch = 120
  19.   TextHeight = 16
  20.   object StatusBar: TStatusBar
  21.     Left = 0
  22.     Top = 277
  23.     Width = 362
  24.     Height = 23
  25.     Panels = <>
  26.     SimplePanel = True
  27.   end
  28.   object Toolbar: TPanel
  29.     Left = 0
  30.     Top = 0
  31.     Width = 362
  32.     Height = 35
  33.     Hint = 'Toolbar'
  34.     Align = alTop
  35.     BevelOuter = bvNone
  36.     TabOrder = 1
  37.     object spdAdd: TSpeedButton
  38.       Left = 7
  39.       Top = 5
  40.       Width = 25
  41.       Height = 25
  42.       Hint = 'Add'
  43.       Glyph.Data = {
  44.         FE000000424DFE00000000000000760000002800000010000000110000000100
  45.         0400000000008800000084120000841200001000000000000000000000000000
  46.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  47.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  48.         333333333300000000033333330FFFFFFF033333000000000F0333330FFFFFFF
  49.         0F0333330FFFFFFF0F0333330FFFFFFF0F0333330FFFFFFF0F0330330FFFFFFF
  50.         0F0333030F0FFFFF0003333000FFFFFF03333003300000000333333030333333
  51.         3333330303033333333330333330333333333333033333333333333333333333
  52.         3333}
  53.       ParentShowHint = False
  54.       ShowHint = True
  55.       OnClick = spdAddClick
  56.     end
  57.     object spdRemove: TSpeedButton
  58.       Left = 32
  59.       Top = 5
  60.       Width = 25
  61.       Height = 25
  62.       Hint = 'Remove'
  63.       Glyph.Data = {
  64.         F6000000424DF600000000000000760000002800000010000000100000000100
  65.         0400000000008000000074120000741200001000000000000000000000000000
  66.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  67.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  68.         333333333300000000033333330FFFFFFF033333000000000F0333330FFFFFFF
  69.         0F0333330FFFFFFF0F0333330FFFFFFF0F0333330FFFFFFF0F0333330FFFFFFF
  70.         0F0333330FFFFFFF0003113311FFFFFF03333111100000000333331133333333
  71.         3333311113333333333311331133333333333333333333333333}
  72.       ParentShowHint = False
  73.       ShowHint = True
  74.       OnClick = spdRemoveClick
  75.     end
  76.     object spdClose: TSpeedButton
  77.       Left = 98
  78.       Top = 5
  79.       Width = 65
  80.       Height = 25
  81.       Hint = 'Close System Monitor'
  82.       Caption = '&Close'
  83.       ParentShowHint = False
  84.       ShowHint = True
  85.       OnClick = spdCloseClick
  86.     end
  87.     object Bevel1: TBevel
  88.       Left = 0
  89.       Top = 30
  90.       Width = 362
  91.       Height = 5
  92.       Align = alBottom
  93.       Shape = bsBottomLine
  94.     end
  95.     object spdReset: TSpeedButton
  96.       Left = 65
  97.       Top = 4
  98.       Width = 25
  99.       Height = 25
  100.       Hint = 'Reset All Monitors'
  101.       Glyph.Data = {
  102.         78010000424D7801000000000000760000002800000020000000100000000100
  103.         04000000000000000000120B0000120B00000000000000000000000000000000
  104.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  105.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
  106.         555557777F777555F55500000000555055557777777755F75555005500055055
  107.         555577F5777F57555555005550055555555577FF577F5FF55555500550050055
  108.         5555577FF77577FF555555005050110555555577F757777FF555555505099910
  109.         555555FF75777777FF555005550999910555577F5F77777775F5500505509990
  110.         3055577F75F77777575F55005055090B030555775755777575755555555550B0
  111.         B03055555F555757575755550555550B0B335555755555757555555555555550
  112.         BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
  113.         50BB555555555555575F555555555555550B55555555555555750000}
  114.       NumGlyphs = 2
  115.       ParentShowHint = False
  116.       ShowHint = True
  117.       OnClick = spdResetClick
  118.     end
  119.   end
  120.   object PanelMonitor: TPanel
  121.     Left = 0
  122.     Top = 38
  123.     Width = 362
  124.     Height = 236
  125.     Align = alClient
  126.     BevelOuter = bvNone
  127.     TabOrder = 2
  128.     OnClick = PanelMonitorClick
  129.   end
  130.   object Panel1: TPanel
  131.     Left = 0
  132.     Top = 35
  133.     Width = 362
  134.     Height = 3
  135.     Align = alTop
  136.     BevelOuter = bvNone
  137.     TabOrder = 3
  138.   end
  139.   object Panel2: TPanel
  140.     Left = 0
  141.     Top = 274
  142.     Width = 362
  143.     Height = 3
  144.     Align = alBottom
  145.     BevelOuter = bvNone
  146.     TabOrder = 4
  147.   end
  148.   object PopupMenu1: TPopupMenu
  149.     OnPopup = PopupMenu1Popup
  150.     Left = 292
  151.     Top = 10
  152.     object popAdd: TMenuItem
  153.       Caption = '&Add...'
  154.       Hint = 'Add a new monitor'
  155.       ShortCut = 0
  156.       OnClick = PopMenuClick
  157.     end
  158.     object popRemove: TMenuItem
  159.       Caption = '&Remove'
  160.       Hint = 'Remove selected monitor'
  161.       ShortCut = 0
  162.       OnClick = PopMenuClick
  163.     end
  164.     object N1: TMenuItem
  165.       Caption = '-'
  166.       ShortCut = 0
  167.     end
  168.     object popReset: TMenuItem
  169.       Caption = 'R&eset'
  170.       Hint = 'Reset the monitor'
  171.       ShortCut = 0
  172.       OnClick = PopMenuClick
  173.     end
  174.     object popHist: TMenuItem
  175.       Caption = '&History Window...'
  176.       Hint = 'Display the history window'
  177.       ShortCut = 0
  178.       Visible = False
  179.       OnClick = PopMenuClick
  180.     end
  181.     object popColor: TMenuItem
  182.       Caption = '&Color...'
  183.       Hint = 'Change the monitor color'
  184.       ShortCut = 0
  185.       Visible = False
  186.       OnClick = PopMenuClick
  187.     end
  188.     object popUnits: TMenuItem
  189.       Caption = 'Show Current Value'
  190.       GroupIndex = 1
  191.       ShortCut = 0
  192.       OnClick = PopMenuClick
  193.     end
  194.     object N2: TMenuItem
  195.       Caption = '-'
  196.       GroupIndex = 1
  197.       ShortCut = 0
  198.     end
  199.     object popAnalog: TMenuItem
  200.       Caption = 'A&nalog'
  201.       GroupIndex = 1
  202.       Hint = 'Analog monitor'
  203.       RadioItem = True
  204.       ShortCut = 0
  205.       OnClick = PopMenuClick
  206.     end
  207.     object popBar: TMenuItem
  208.       Caption = '&Bar'
  209.       GroupIndex = 1
  210.       Hint = 'Bar monitor'
  211.       RadioItem = True
  212.       ShortCut = 0
  213.       OnClick = PopMenuClick
  214.     end
  215.     object popHisto: TMenuItem
  216.       Caption = 'H&istogram'
  217.       GroupIndex = 1
  218.       Hint = 'Histogram monitor'
  219.       RadioItem = True
  220.       ShortCut = 0
  221.       OnClick = PopMenuClick
  222.     end
  223.   end
  224. end
  225.